	\begin{pspicture}(0,0)(10,10)
		\rput(1,10){\circlenode[linecolor=black]{0}{0}}
		\rput(4,10){\circlenode[linecolor=black]{1}{1}}
		\rput(0,8){\circlenode[linecolor=black]{2}{2}}
		\rput(3,8){\circlenode[linecolor=black]{3}{3}}
		\rput(5,7){\circlenode[linecolor=black]{4}{4}}
		\rput(0,6){\circlenode[linewidth=0.1,linecolor=red]{5}{5}}
		\rput(3,5.8){\circlenode[linecolor=black]{6}{6}}
		\rput(5,5.3){\circlenode[linecolor=black]{7}{7}}
		\rput(0.3,4.2){\circlenode[linecolor=black]{8}{8}}
		\rput(2.7,4){\circlenode[linecolor=black]{9}{9}}
			
		\ncline[linecolor=black]{->}{0}{2}
		\ncline[linecolor=black]{->}{1}{0}
		\ncline[linecolor=black]{->}{1}{3}
		\ncline[linecolor=black]{->}{2}{5}
		\ncline[linecolor=black]{->}{3}{0}
		\ncline[linecolor=black]{->}{3}{4}
		\ncline[linecolor=black]{->}{4}{6}
		\ncline[linecolor=black]{->}{6}{5}
		\ncline[linecolor=black]{->}{7}{4}
		\ncline[linecolor=black]{->}{7}{6}
		\ncline[linecolor=black]{->}{8}{5}
		\ncline[linecolor=black]{->}{9}{6}
		\ncline[linecolor=black]{->}{9}{8}

		\pnode(5.5,2){splitA}
		\pnode(5.5,10){splitB}
		\ncline[linecolor=black]{splitA}{splitB}
		
		\rput(7.5,10){\circlenode[linewidth=0.1,linecolor=red]{5p}{5}}
		\pnode(6,9){level1A}
		\pnode(10,9){level1B}
		\ncline[linecolor=black]{level1A}{level1B}		
		\rput(6.3,8.2){\circlenode[linecolor=black]{2p}{2}}
		\rput(7.5,8){\circlenode[linecolor=black]{6p}{6}}
		\rput(9,7.8){\circlenode[linecolor=black]{8p}{8}}
		\pnode(6,7){level2A}
		\pnode(10,7){level2B}
		\ncline[linecolor=black]{level2A}{level2B}
		\rput(6.1,5.5){\circlenode[linecolor=black]{0p}{0}}
		\rput(7,5.3){\circlenode[linecolor=black]{4p}{4}}
		\rput(8,5.1){\circlenode[linecolor=black]{7p}{7}}
		\rput(9,6){\circlenode[linecolor=black]{9p}{9}}
		\pnode(6,4.6){level3A}
		\pnode(10,4.6){level3B}
		\ncline[linecolor=black]{level3A}{level3B}
		\rput(6,4.1){\circlenode[linecolor=black]{1p}{1}}
		\rput(7,4.2){\circlenode[linecolor=black]{3p}{3}}
		
		\ncline[linecolor=black]{->}{0p}{2p}
		\ncline[linecolor=black]{->}{1p}{0p}
		\ncline[linecolor=black]{->}{1p}{3p}
		\ncline[linecolor=black]{->}{2p}{5p}
		\ncline[linecolor=black]{->}{3p}{0p}
		\ncline[linecolor=black]{->}{3p}{4p}
		\ncline[linecolor=black]{->}{4p}{6p}
		\ncline[linecolor=black]{->}{6p}{5p}
		\ncline[linecolor=black]{->}{7p}{4p}
		\ncline[linecolor=black]{->}{7p}{6p}
		\ncline[linecolor=black]{->}{8p}{5p}
		\ncline[linecolor=black]{->}{9p}{6p}
		\ncline[linecolor=black]{->}{9p}{8p}
	\end{pspicture}
